10 IFA=0THENA=1:LOAD"SWOOP",8,1
20 SYS49152